home *** CD-ROM | disk | FTP | other *** search
- inherited frmLoopDataset: TfrmLoopDataset
- Left = 411
- Top = 233
- HelpContext = 53
- OldCreateOrder = True
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- inherited pnlTop: TPanel
- inherited lblCommandName: TLabel
- Caption = ''
- end
- inherited memActionDesc: TMemo
- Lines.Strings = (
-
- 'Loops through the rows of the dataset specified. With each succ' +
- 'essive loop the '
-
- 'current row of the dataset is incremented. The loop ends when a' +
- 't the end of the '
- 'dataset or when a Break is encountered.')
- end
- end
- inherited pnlCenter: TPanel
- inherited pgcControlPage: TPageControl
- inherited tbsAM5Main: TTabSheet
- object lblDataset: TLabel
- Left = 10
- Top = 16
- Width = 157
- Height = 13
- AutoSize = False
- Caption = 'D&ataset name:'
- FocusControl = cboDataset
- end
- object cboDataset: TAM5VarListComboBox
- Left = 10
- Top = 32
- Width = 224
- Height = 21
- ItemHeight = 13
- TabOrder = 0
- end
- object grpOptionalParams: TGroupBox
- Left = 10
- Top = 65
- Width = 449
- Height = 116
- TabOrder = 1
- object lblStartRow: TLabel
- Left = 14
- Top = 16
- Width = 181
- Height = 13
- AutoSize = False
- Caption = '&Start row:'
- FocusControl = edtStartRow
- end
- object lblEndRow: TLabel
- Left = 14
- Top = 65
- Width = 173
- Height = 13
- AutoSize = False
- Caption = 'E&nd row:'
- FocusControl = edtEndRow
- end
- object edtStartRow: TEdit
- Left = 14
- Top = 32
- Width = 212
- Height = 21
- TabOrder = 0
- end
- object edtEndRow: TEdit
- Left = 14
- Top = 81
- Width = 212
- Height = 21
- TabOrder = 1
- end
- end
- object chkOptionalParams: TCheckBox
- Left = 20
- Top = 64
- Width = 425
- Height = 17
- Caption = '&Optional parameters'
- TabOrder = 2
- OnClick = chkOptionalParamsClick
- end
- end
- end
- end
- inherited taclKeyboardTrap: TActionList
- Left = 200
- end
- inherited dxSIBarManager: TdxBarManager
- Categories.ItemsVisibles = (
- 2)
- Categories.Visibles = (
- True)
- PopupMenuLinks = <
- item
- Control = lsvAM5Errors
- PopupMenu = dxCheckPopup
- end>
- DockControlHeights = (
- 0
- 0
- 0
- 0)
- end
- inherited dxCheckPopup: TdxBarPopupMenu
- ItemLinks = <
- item
- Item = itmCheckAllErrors
- UserGlyph.Data = {00000000}
- Visible = True
- end
- item
- Item = itmCheckNoErrors
- UserGlyph.Data = {00000000}
- Visible = True
- end>
- end
- inherited IvTranslator1: TIvTranslator
- Left = 232
- end
- end
-